home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / Rinaldi / HC 1.2 & 2.0 / XRef 1.3.cpt / XRef 1.3 (US) / card_2974.txt < prev    next >
Text File  |  1992-07-20  |  5KB  |  211 lines
  1. -- card: 2974 from stack: in.3 (US)
  2. -- bmap block id: 3163
  3. -- flags: 0000
  4. -- background id: 2618
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (field)
  9. -- low flags: 01
  10. -- high flags: 0007
  11. -- rect: left=69 top=68 right=252 bottom=434
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 0
  15. -- font id: 3
  16. -- text size: 9
  17. -- style flags: 0
  18. -- line height: 12
  19. -- part name: Text
  20.  
  21.  
  22. -- part 2 (button)
  23. -- low flags: 00
  24. -- high flags: A003
  25. -- rect: left=174 top=281 right=311 bottom=343
  26. -- title width / last selected line: 0
  27. -- icon id / first selected line: 0 / 0
  28. -- text alignment: 1
  29. -- font id: 0
  30. -- text size: 12
  31. -- style flags: 0
  32. -- line height: 16
  33. -- part name: XRef
  34. ----- HyperTalk script -----
  35. on mouseUp
  36.   answer "List what :" with "Handler" or "Variables" or "Xternals"
  37.   put it into ListWhat
  38.   answer "List all :" with "Annuler" or "False" or "True"
  39.   if it is "Annuler" then exit mouseUp
  40.   put it into ListAll
  41.   answer "List numbers :" with "Annuler" or "False" or "True"
  42.   if it is "Annuler" then exit mouseUp
  43.   put it into ListNb
  44.  
  45.   set cursor to watch
  46.   put XRef(script of this stack,ListWhat,ListAll,ListNb) into cd fld 2
  47.   show cd fld 2
  48. end mouseUp
  49.  
  50.  
  51.  
  52. -- part 3 (field)
  53. -- low flags: 81
  54. -- high flags: 0007
  55. -- rect: left=69 top=68 right=252 bottom=434
  56. -- title width / last selected line: 0
  57. -- icon id / first selected line: 0 / 0
  58. -- text alignment: 0
  59. -- font id: 3
  60. -- text size: 9
  61. -- style flags: 0
  62. -- line height: 12
  63. -- part name: 
  64. ----- HyperTalk script -----
  65. on mouseUp
  66.   hide me
  67.   put empty into me
  68. end mouseUp
  69.  
  70.  
  71. -- part contents for card part 1
  72. ----- text -----
  73.  
  74.  
  75.                                                   XRef 1.3
  76.  
  77.                                           by Fr√©d√©ric RINALDI
  78.  
  79.  
  80. DESCRIPTION
  81. ------------
  82.   XRef is a tool for cross-referencing handlers, variables and externals in an HC script.
  83.  
  84.  
  85. SYNTAX
  86. --------
  87.                   XRef(<script>[,<H[andlers]|V[ariables]|X[ternals]>
  88.                           [,<ListAll>[,<ListNb>]]])
  89.  
  90.  
  91. PARAMETERS
  92. ------------
  93.    <script> is the script text to explore
  94.  
  95.    <H[andlers]|V[ariables]|X[ternals]> defines the desired X-Ref mode: by handlers, by variables or by externals.
  96.  
  97.    <ListAll> is a boolean. When TRUE, all subitems are listed for each found entry. Default is FALSE.
  98.  
  99.    <ListNb> is a boolean, used only if <ListAll> = TRUE. When TRUE, all line numbers are listed along with each subitem. Default is FALSE.
  100.  
  101.    Using "!", "?" and "=" as first parameter will return an online help (resp. copyright,  syntax and output).
  102.  
  103.  
  104. USING
  105. -----
  106.    The XFCN returns a list of found entries, depending of the choosen X-Ref mode. Each entry is followed by its type, which can be [HN] (handler), [LV] (local variable, [GV] (global variable), [XC] (external command) or [XF] (external function).
  107.  
  108.    Mode=H, ListAll=FALSE, ListNb=FALSE
  109.    <handler 1>
  110.    ‚Ķ
  111.    <handler N>
  112.  
  113.    Mode=H, ListAll=TRUE, ListNb=FALSE
  114.    <handler 1>
  115.    <var/xter 1>[‚Ķ,<var/xter N>]
  116.  
  117.    ‚Ķ
  118.    <handler N>
  119.    <var/xter 1>[‚Ķ,<var/xter N>]
  120.  
  121.    Mode=H, ListAll=TRUE, ListNb=TRUE
  122.    <handler 1>
  123.    <var/xter 1>: <line 1>[,<line N>]
  124.    ‚Ķ
  125.    <var/xter N>: <line 1>[,<line N>]
  126.  
  127.    ‚Ķ
  128.    <handler N>
  129.    <var/xter 1>: <line 1>[,<line N>]
  130.    ‚Ķ
  131.    <var/xter N>: <line 1>[,<line N>]
  132.  
  133.  
  134.    Mode=V, ListAll=FALSE, ListNb=FALSE
  135.    <variable 1>
  136.    ‚Ķ
  137.    <variable N>
  138.  
  139.    Mode=V, ListAll=TRUE, ListNb=FALSE
  140.    <variable 1>
  141.    <handler 1>[‚Ķ,<handler N>]
  142.  
  143.    ‚Ķ
  144.    <variable N>
  145.    <handler 1>[‚Ķ,<handler N>]
  146.  
  147.    Mode=V, ListAll=TRUE, ListNb=TRUE
  148.    <variable 1>
  149.    <handler 1>: <line 1>[,<line N>]
  150.    ‚Ķ
  151.    <handler N>: <line 1>[,<line N>]
  152.  
  153.    ‚Ķ
  154.    <variable N>
  155.    <handler 1>: <line 1>[,<line N>]
  156.    ‚Ķ
  157.    <handler N>: <line 1>[,<line N>]
  158.  
  159.  
  160.    Mode=X, ListAll=FALSE, ListNb=FALSE
  161.    <external 1>
  162.    ‚Ķ
  163.    <external N>
  164.  
  165.    Mode=X, ListAll=TRUE, ListNb=FALSE
  166.    <external 1>
  167.    <handler 1>[‚Ķ,<handler N>]
  168.  
  169.    ‚Ķ
  170.    <external N>
  171.    <handler 1>[‚Ķ,<handler N>]
  172.  
  173.    Mode=X, ListAll=TRUE, ListNb=TRUE
  174.    <external 1>
  175.    <handler 1>: <line 1>[,<line N>]
  176.    ‚Ķ
  177.    <handler N>: <line 1>[,<line N>]
  178.  
  179.    ‚Ķ
  180.    <external N>
  181.    <handler 1>: <line 1>[,<line N>]
  182.    ‚Ķ
  183.    <handler N>: <line 1>[,<line N>]
  184.  
  185.  
  186. ERRORS
  187. -------
  188. If an error occurs, XRef can return :
  189.      "Error : Out of memory"
  190.      "Error : Missing or empty script parameter"
  191.      "Error : Second param must begin with [H,V,X]"
  192.      "Error : Third param must be boolean"
  193.      "Error : Fourth param must be boolean"
  194.      "Error : Couldn't get WTLK resource"
  195.  
  196. HISTORY
  197. --------
  198. 1.3 :                                                                                          07/20/92
  199. ‚Ä¢ Fixed WTLK access for HC 1.2
  200. ‚Ä¢ Fixed empty string result
  201.  
  202. 1.2 :                                                                                          03/23/92
  203. ‚Ä¢¬†First release
  204. --------------------------------------------------------------------
  205.    All externals included in this stack are FreeWare and may be used in non-commercial software provided the following notice is visibly present :
  206.  
  207.                    XRef XCMD ¬© Frederic Rinaldi, 1990‚Ķ1992.
  208.  
  209.    Free for non-commercial use. Use in commercial software subjected to prior acknowledgement and licensing from the author, reachable at the following network addresses:
  210.  
  211. AppleLink: RINALDI1   CalvaCom : FR10    Compuserve : 71170,2111